home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 1
/
CD Fun House (Wayzata Technology).iso
/
•The School House•
/
MacMatch ••••
/
MacMatch
/
MacMatch.rsrc
/
CODE_5_Initial.txt
< prev
next >
Wrap
Text File
|
1988-10-24
|
13KB
|
225 lines
# near model CODE resource
# jump table entries: 336-336 (1 of them)
export_42:
00000000 4E56 FFF8 link A6, -0x0008
00000004 48E7 0328 movem.l -[A7], D6,D7,A2,A4
00000008 41ED 8708 lea.l A0, [A5 - 0x78F8]
0000000C 2F08 move.l -[A7], A0
0000000E A86E syscall InitGraf
00000010 A8FE syscall InitFonts
00000012 A912 syscall InitWindows
00000014 A9CC syscall TEInit
00000016 3F3C FFFF move.w -[A7], 0xFFFF
0000001A 4267 clr.w -[A7]
0000001C 201F move.l D0, [A7]+
0000001E A032 syscall FlushEvents
00000020 42A7 clr.l -[A7]
00000022 A97B syscall InitDialogs
00000024 41ED C92E lea.l A0, [A5 - 0x36D2]
00000028 2B48 9852 move.l [A5 - 0x67AE], A0
0000002C 3B7C 0034 9856 move.w [A5 - 0x67AA], 0x34 /* '4' */
00000032 486D 9858 pea.l [A5 - 0x67A8]
00000036 4267 clr.w -[A7]
00000038 4267 clr.w -[A7]
0000003A 3F3C 01A0 move.w -[A7], 0x1A0
0000003E 3F3C 00F0 move.w -[A7], 0xF0
00000042 A8A7 syscall SetRect
00000044 41ED 986E lea.l A0, [A5 - 0x6792]
00000048 2B48 9860 move.l [A5 - 0x67A0], A0
0000004C 3B7C 0034 9864 move.w [A5 - 0x679C], 0x34 /* '4' */
00000052 486D 9866 pea.l [A5 - 0x679A]
00000056 4267 clr.w -[A7]
00000058 4267 clr.w -[A7]
0000005A 3F3C 01A0 move.w -[A7], 0x1A0
0000005E 3F3C 00F0 move.w -[A7], 0xF0
00000062 A8A7 syscall SetRect
00000064 42A7 clr.l -[A7]
00000066 A8D8 syscall NewRgn
00000068 2B5F 972A move.l [A5 - 0x68D6], [A7]+
0000006C 42A7 clr.l -[A7]
0000006E 3F3C 0004 move.w -[A7], 0x4
00000072 A9B9 syscall GetCursor
00000074 2B5F FA50 move.l [A5 - 0x5B0], [A7]+
00000078 2F2D FA50 move.l -[A7], [A5 - 0x5B0]
0000007C 4EAD 007A jsr [A5 + 0x7A /* export_11 */]
00000080 A930 syscall InitMenus
00000082 42A7 clr.l -[A7]
00000084 3F3C 0001 move.w -[A7], 0x1
00000088 A9BF syscall GetRMenu
0000008A 2B5F FA70 move.l [A5 - 0x590], [A7]+
0000008E 206D FA70 movea.l A0, [A5 - 0x590]
00000092 2050 movea.l A0, [A0]
00000094 7001 moveq.l D0, 0x01
00000096 11BC 0014 000E move.b [A0 + D0.w + 0xE], 0x14
0000009C 7C02 moveq.l D6, 0x02
0000009E 601A bra +0x1C /* 000000BA */
label000000A0:
000000A0 3006 move.w D0, D6
000000A2 E540 asl D0.w, 2
000000A4 2F00 move.l -[A7], D0
000000A6 42A7 clr.l -[A7]
000000A8 3F06 move.w -[A7], D6
000000AA A9BF syscall GetRMenu
000000AC 221F move.l D1, [A7]+
000000AE 201F move.l D0, [A7]+
000000B0 41ED FA6C lea.l A0, [A5 - 0x594]
000000B4 2181 0000 move.l [A0 + D0.w], D1
000000B8 5246 addq.w D6, 1
label000000BA:
000000BA 0C46 0005 cmpi.w D6, 0x5
000000BE 6FE0 ble -0x1E /* 000000A0 */
000000C0 7C01 moveq.l D6, 0x01
000000C2 6012 bra +0x14 /* 000000D6 */
label000000C4:
000000C4 3006 move.w D0, D6
000000C6 E540 asl D0.w, 2
000000C8 41ED FA6C lea.l A0, [A5 - 0x594]
000000CC 2F30 0000 move.l -[A7], [A0 + D0.w]
000000D0 4267 clr.w -[A7]
000000D2 A935 syscall InsertMenu
000000D4 5246 addq.w D6, 1
label000000D6:
000000D6 0C46 0005 cmpi.w D6, 0x5
000000DA 6FE8 ble -0x16 /* 000000C4 */
000000DC 3B7C 0001 FEAC move.w [A5 - 0x154], 0x1
000000E2 2F2D FA7C move.l -[A7], [A5 - 0x584]
000000E6 3F2D FEAC move.w -[A7], [A5 - 0x154]
000000EA 1F3C 0001 move.b -[A7], 0x1
000000EE A945 syscall CheckItem
000000F0 3B7C 0001 FEAE move.w [A5 - 0x152], 0x1
000000F6 2F2D FA80 move.l -[A7], [A5 - 0x580]
000000FA 3F2D FEAE move.w -[A7], [A5 - 0x152]
000000FE 1F3C 0001 move.b -[A7], 0x1
00000102 A945 syscall CheckItem
00000104 4267 clr.w -[A7]
00000106 4EAD 0142 jsr [A5 + 0x142 /* export_36 */]
0000010A A937 syscall DrawMenuBar
0000010C 422D FB88 clr.b [A5 - 0x478]
00000110 486D 9726 pea.l [A5 - 0x68DA]
00000114 3F3C 006C move.w -[A7], 0x6C /* 'l' */
00000118 4EAD 002A jsr [A5 + 0x2A /* export_1 */]
0000011C 2F2D 9726 move.l -[A7], [A5 - 0x68DA]
00000120 A86F syscall OpenPort
00000122 42A7 clr.l -[A7]
00000124 3F3C 0100 move.w -[A7], 0x100
00000128 A9BA syscall GetString
0000012A 2B5F 96AE move.l [A5 - 0x6952], [A7]+
0000012E 2F2D 96AE move.l -[A7], [A5 - 0x6952]
00000132 4EAD 006A jsr [A5 + 0x6A /* export_9 */]
00000136 4247 clr.w D7
00000138 6026 bra +0x28 /* 00000160 */
label0000013A:
0000013A 42A7 clr.l -[A7]
0000013C 3007 move.w D0, D7
0000013E D07C 0119 add.w D0, 0x119
00000142 3F00 move.w -[A7], D0
00000144 A9BA syscall GetString
00000146 285F movea.l A4, [A7]+
00000148 3007 move.w D0, D7
0000014A E140 asl D0.w, 8
0000014C 2054 movea.l A0, [A4]
0000014E 45ED 88AE lea.l A2, [A5 - 0x7752]
00000152 43F2 0000 lea.l A1, [A2 + D0.w]
00000156 7040 moveq.l D0, 0x40
label00000158:
00000158 22D8 move.l [A1]+, [A0]+
0000015A 5340 subq.w D0, 1
0000015C 6EFA bgt -0x4 /* 00000158 */
0000015E 5247 addq.w D7, 1
label00000160:
00000160 0C47 000D cmpi.w D7, 0xD /* '\r' */
00000164 6FD4 ble -0x2A /* 0000013A */
00000166 486D 889E pea.l [A5 - 0x7762]
0000016A 3F3C 000E move.w -[A7], 0xE
0000016E 3F3C 0130 move.w -[A7], 0x130
00000172 3F3C 0060 move.w -[A7], 0x60 /* '`' */
00000176 3F3C 014E move.w -[A7], 0x14E
0000017A A8A7 syscall SetRect
0000017C 486D 889E pea.l [A5 - 0x7762]
00000180 486D 86F8 pea.l [A5 - 0x7908]
00000184 A8A5 syscall FillRect
00000186 486D 889E pea.l [A5 - 0x7762]
0000018A 3F3C FFFC move.w -[A7], 0xFFFC
0000018E 3F3C FFFC move.w -[A7], 0xFFFC
00000192 A8A8 syscall OffsetRect
00000194 486D 88A6 pea.l [A5 - 0x775A]
00000198 3F3C 000B move.w -[A7], 0xB
0000019C 3F3C 0137 move.w -[A7], 0x137
000001A0 3F3C 005B move.w -[A7], 0x5B /* '[' */
000001A4 3F3C 0143 move.w -[A7], 0x143
000001A8 A8A7 syscall SetRect
000001AA 486D 889E pea.l [A5 - 0x7762]
000001AE A8A3 syscall EraseRect
000001B0 486D 889E pea.l [A5 - 0x7762]
000001B4 A8A1 syscall FrameRect
000001B6 4267 clr.w -[A7]
000001B8 4EAD 011A jsr [A5 + 0x11A /* export_31 */]
000001BC 4247 clr.w D7
000001BE 6062 bra +0x64 /* 00000222 */
label000001C0:
000001C0 3007 move.w D0, D7
000001C2 5240 addq.w D0, 1
000001C4 E740 asl D0.w, 3
000001C6 41ED 96AA lea.l A0, [A5 - 0x6956]
000001CA 4870 0000 pea.l [A0 + D0.w]
000001CE 3007 move.w D0, D7
000001D0 C1FC 0060 muls.w D0, 0x60 /* '`' */
000001D4 D07C 0076 add.w D0, 0x76 /* 'v' */
000001D8 3F00 move.w -[A7], D0
000001DA 3F3C 0122 move.w -[A7], 0x122
000001DE 3007 move.w D0, D7
000001E0 C1FC 0060 muls.w D0, 0x60 /* '`' */
000001E4 D07C 00BC add.w D0, 0xBC
000001E8 3F00 move.w -[A7], D0
000001EA 3F3C 0153 move.w -[A7], 0x153
000001EE A8A7 syscall SetRect
000001F0 3007 move.w D0, D7
000001F2 5240 addq.w D0, 1
000001F4 E740 asl D0.w, 3
000001F6 41ED 96CA lea.l A0, [A5 - 0x6936]
000001FA 4870 0000 pea.l [A0 + D0.w]
000001FE 3007 move.w D0, D7
00000200 C1FC 0060 muls.w D0, 0x60 /* '`' */
00000204 D07C 007E add.w D0, 0x7E /* '~' */
00000208 3F00 move.w -[A7], D0
0000020A 3F3C 013A move.w -[A7], 0x13A
0000020E 3007 move.w D0, D7
00000210 C1FC 0060 muls.w D0, 0x60 /* '`' */
00000214 D07C 00B4 add.w D0, 0xB4
00000218 3F00 move.w -[A7], D0
0000021A 3F3C 0148 move.w -[A7], 0x148
0000021E A8A7 syscall SetRect
00000220 5247 addq.w D7, 1
label00000222:
00000222 0C47 0003 cmpi.w D7, 0x3
00000226 6F98 ble -0x66 /* 000001C0 */
00000228 3F3C 0004 move.w -[A7], 0x4
0000022C 4EAD 014A jsr [A5 + 0x14A /* export_37 */]
00000230 422D FC9A clr.b [A5 - 0x366]
00000234 422D FA65 clr.b [A5 - 0x59B]
00000238 41ED 971A lea.l A0, [A5 - 0x68E6]
0000023C 43ED 86F8 lea.l A1, [A5 - 0x7908]
00000240 20D9 move.l [A0]+, [A1]+
00000242 20D9 move.l [A0]+, [A1]+
00000244 41ED 9712 lea.l A0, [A5 - 0x68EE]
00000248 43ED 86E0 lea.l A1, [A5 - 0x7920]
0000024C 20D9 move.l [A0]+, [A1]+
0000024E 20D9 move.l [A0]+, [A1]+
00000250 41ED 970A lea.l A0, [A5 - 0x68F6]
00000254 43ED 86F0 lea.l A1, [A5 - 0x7910]
00000258 20D9 move.l [A0]+, [A1]+
0000025A 20D9 move.l [A0]+, [A1]+
0000025C 41ED 9702 lea.l A0, [A5 - 0x68FE]
00000260 43ED 86E8 lea.l A1, [A5 - 0x7918]
00000264 20D9 move.l [A0]+, [A1]+
00000266 20D9 move.l [A0]+, [A1]+
00000268 41ED 96FA lea.l A0, [A5 - 0x6906]
0000026C 43ED 8700 lea.l A1, [A5 - 0x7900]
00000270 20D9 move.l [A0]+, [A1]+
00000272 20D9 move.l [A0]+, [A1]+
00000274 4267 clr.w -[A7]
00000276 4EAD 0132 jsr [A5 + 0x132 /* export_34 */]
0000027A 4CDF 14C0 movem.l D6,D7,A2,A4, [A7]+
0000027E 4E5E unlink A6
00000280 4E75 rts